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' 
| REQUIRE file for DELETE utility, DELETE.REO 
Version: *v04-000' 


’ SHSHSHHHHSSHAHHHHHHHTAAHeHeeHetteeererereeeteretenaatereeeeeeeeeeeTeseeeeee 
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ie COPYRIGHT (¢) 1978 1980, 1982, 1984 BY 

ie biGit AL EQu 1 Cor PORATION, MAYNARD, MASSACHUSETTS. 

ie ALL RIGHTS RE 

'e THIS TWARE ise z HED UNDER A LICENSE AND SED AND faite 
io W ACCORDANCE WA THE TERR OF SUCH, LICENSE "AND WITH 

ie J Inch COPYRIGHT NOTICE. THIS ARE OR 

ie COPIES WEREOF "Ear oo 1M PROVIDED OR OTHERWISE mASE AVAILABLE 18. pte 


t@ TRANSFERRED. 
ie THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
- CORPORAT ibe NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


te ore ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 


* 
* 
* 
* 
® 
* 
e 
* 
’ 
* 
:® OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY “ 
* 
* 
* 
. 
’ 
* 
t@ SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. : 

* 
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i FACILITY: DELETE 

! ABSTRACT: 

This file contains the common definitions for DELETE and PURGE. 
i ENVIRONMENT : 

i VAX native, user mode. 


i AUTHOR: Stephen Zalewski CREATION DATE: 22-JUL-1982 
i Modified by: 
v03-003 $HZ0003 Stephen H. Zalewski, 11-Dec-1983 
Add new error Literal and new flag definitions. 
v03-002 SurO002 Stephen H. Zalewski, 19-Jan-1982 
Added new shared message. 
v03-001 SNz0001 Stephen H. Zalewski, 4-Nov-1982 13:30 


Remove unnecessary iterais. Also remove unnecessary field 
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' 
‘ 
definitions from del$cli_status longword. 
‘ 
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LITERAL 
true = 1, ! Standard Boolean value for ‘true 
false = 0, ! Standard Boolean value for “false” 
no_more_ files = 3. ! Another success code 
bad yerSion = 2, : Bad version number 
no_Tile = 0; ! Failure code 
MACRO 
; Field definitions for DELSCLI_STATUS, general flags. 
"del $v_log_msg = .1,1,0 %, 
del$v_keep = 2.1.0 &, ! /KEEP 
del$v_purge_cmd = 2301.0 &, ! PURGE command being processed 
del$v_erase = 4.1.0 &, ! /ERASE 
del$v_cntri_z_stop = 25-160 By ' Control_2 returned from /CONFIRM prompt 
del$v_conf_prompt = $1, i, ! Confirm prompt requested 
del$v_open_file = slatel Gs ! Open file (performance optimization) 
MACRO 


The PUT_MESSAGE macro SIGNALS an error to the catchall handler. 


put_message coop, volver = 
SIGNAL oog_yelue 
Z1F ZLENGTH GTR 1 


ZTHEN , ZREMAINING ZF I) 


The message codes for DELETE and PURGE. 


147 , local, 


Sshr_msgdef (ms 
“ee Sttildel, info) 


inotpur, warning), 
in 


purgever, error), 
parsefail, warning), 
total,info), 
(badvalue, severe), 

s il ,warning) 
filnotacc, warning)) 


“Error deleting <file-name> 
“Error deleting <file-name>" 


“error pers ing <file-name 
“# files deleted (# blocks)” 


"“<file-name> deleted (# blocks)" 
“explicit or wildcard version number required” 


“<file-name> deleted (# blocks)"’ 
“No files purged for <file-name>"’ 
“version numbers are not permitted’ 


“*aS is an invalid keyword value’ 
“Error searching for <file-name>"’ 
“file not accessiole <file name>" 
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